home *** CD-ROM | disk | FTP | other *** search
- #include <stdio.h>
- #include <stdarg.h>
- #include "global.h"
-
- void *mallok(n)
- size_t n;
- {
- void *r = malloc(n);
-
- if (!r)
- fatal("Out of memory -- cannot allocate %ld bytes", (unsigned long)n);
- return r;
- }
-
- void *reallok(r, n)
- void *r;
- size_t n;
- {
- r = realloc(r, n);
- if (!r)
- fatal("Out of memory -- cannot allocate %ld bytes", (unsigned long)n);
- return r;
- }
-
- #ifdef __STDC__
- void error(const char *fmt, ...)
- #else
- void error(fmt) const char *fmt;
- #endif
- {
- va_list ap;
-
- fprintf(stderr, "%s: ", argv0);
- va_start(ap, fmt);
- vfprintf(stderr, fmt, ap);
- va_end(ap);
- fputc('\n', stderr);
- }
-
- #ifdef __STDC__
- void fatal(const char *fmt, ...)
- #else
- void fatal(fmt) const char *fmt;
- #endif
- {
- va_list ap;
-
- fprintf(stderr, "%s: FATAL: ", argv0);
- va_start(ap, fmt);
- vfprintf(stderr, fmt, ap);
- va_end(ap);
- fputc('\n', stderr);
- exit(1);
- }
-
- #ifdef __STDC__
- void bugchk(const char *fmt, ...)
- #else
- void bugchk(fmt) const char *fmt;
- #endif
- {
- va_list ap;
-
- fprintf(stderr, "%s: internal error: ", argv0);
- va_start(ap, fmt);
- vfprintf(stderr, fmt, ap);
- va_end(ap);
- fputc('\n', stderr);
- exit(1);
- }
-